home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 34 / Mac Magazin and MacEasy Magazine CD - Issue 34.iso / Grafik & Text / Alpha ƒ / Tcl / ElectricAlias / Aliases / aliases.Ada < prev    next >
Text File  |  1995-07-16  |  2KB  |  41 lines
  1. #
  2. # Raymond Waldrop <rwaldrop@cs.tamu.edu>
  3. # aliases for Ada mode
  4. #
  5.     electricAlias-def •Ada •Ada •Ada
  6.     electricAlias-var Ada bb ""
  7.     electricAlias-var Ada eb ""
  8.     electricAlias-var Ada bc "--"
  9.     electricAlias-var Ada ec ""
  10.     electricAlias-def •Ada beg "\bbegin\r•"
  11.     electricAlias-def •Ada begin "\bbegin\r•"
  12.     electricAlias-def •Ada case "case • is\r\t\t•\rend case;\r~"
  13.     electricAlias-def •Ada endif "\bend if;\r\b•"
  14.     electricAlias-def •Ada end "\bend •"
  15.     electricAlias-def •Ada entry "entry •\r  (•)\r\twhen • is\r\t•\rend •;"
  16.     electricAlias-def •Ada for "for • in • loop\r\t•\rend loop;\r~"
  17.     electricAlias-def •Ada func "function • return • is\r\t•\rbegin\r\t•\rend •;\r~"
  18.     electricAlias-def •Ada function "function • return • is\r\t•\rbegin\r\t•\rend •;\r~"
  19.     electricAlias-def •Ada gen "generic\r\t•\r~"
  20.     electricAlias-def •Ada generic "generic\r\t•\r~"
  21.     electricAlias-def •Ada if "if • then \r\t•\rend if;\r~"
  22.     electricAlias-def •Ada loop "loop\r\t•\r\end loop;\r~"
  23.     electricAlias-def •Ada or "\bor\r•"
  24.     electricAlias-def •Ada pack "package • is\r\t•\rend •;\r~"
  25.     electricAlias-def •Ada package "package • is\r\t•\rend •;\r~"
  26.     electricAlias-def •Ada private "\bprivate\r•"
  27.     electricAlias-def •Ada proc "procedure • is \r\t• \rbegin\r\t•\rend •;\r~"
  28.     electricAlias-def •Ada procedure "procedure • is \r\t• \rbegin\r\t•\rend •;\r~"
  29.     electricAlias-def •Ada prot "protected • is\r\t•\rend •;\r~"
  30.     electricAlias-def •Ada protected "protected • is\r\t•\rend •;\r~"
  31.     electricAlias-def Ada rci "Remote_Call_Interface"
  32.     electricAlias-def •Ada sel "select\r\t•\rend select;\r~"
  33.     electricAlias-def •Ada select "select\r\t•\rend select;\r~"
  34.     electricAlias-def •Ada sub "subtype • is •"
  35.     electricAlias-def •Ada subtype "subtype • is •"
  36.     electricAlias-def •Ada task "task • is\r\t•\rend •;\r~"
  37.     electricAlias-def •Ada thab "\bthen abort\r•"
  38.     electricAlias-def •Ada type "type • is •"
  39.     electricAlias-def •Ada when "\bwhen • =>\r•"
  40.     electricAlias-def •Ada while "while • loop\r\t•\r\end loop;\r~"
  41.